home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / smfdoor / frmsearc.frm < prev    next >
Text File  |  1999-09-11  |  26KB  |  694 lines
  1. VERSION 5.00
  2. Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
  3. Object = "{EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}#1.1#0"; "SHDOCVW.DLL"
  4. Begin VB.Form frmSmfSearchEngine 
  5.    BackColor       =   &H00000000&
  6.    Caption         =   "SMF Search Engine"
  7.    ClientHeight    =   8535
  8.    ClientLeft      =   60
  9.    ClientTop       =   405
  10.    ClientWidth     =   10530
  11.    Icon            =   "frmSearchengine.frx":0000
  12.    LinkTopic       =   "Form1"
  13.    MaxButton       =   0   'False
  14.    ScaleHeight     =   8535
  15.    ScaleWidth      =   10530
  16.    Begin VB.CommandButton Command5 
  17.       Caption         =   "Print Page"
  18.       Height          =   255
  19.       Left            =   9480
  20.       TabIndex        =   24
  21.       Top             =   120
  22.       Width           =   975
  23.    End
  24.    Begin VB.TextBox txtlocation 
  25.       Height          =   285
  26.       Left            =   3480
  27.       TabIndex        =   23
  28.       Top             =   120
  29.       Width           =   4575
  30.    End
  31.    Begin VB.TextBox txtaddress 
  32.       Height          =   285
  33.       Left            =   7560
  34.       TabIndex        =   21
  35.       Top             =   120
  36.       Visible         =   0   'False
  37.       Width           =   495
  38.    End
  39.    Begin VB.CommandButton Command4 
  40.       Caption         =   "Add To Favorites"
  41.       Height          =   255
  42.       Left            =   1320
  43.       TabIndex        =   20
  44.       Top             =   120
  45.       Width           =   1335
  46.    End
  47.    Begin VB.CommandButton Command3 
  48.       Caption         =   "Stop"
  49.       Height          =   255
  50.       Left            =   8160
  51.       TabIndex        =   19
  52.       Top             =   120
  53.       Width           =   495
  54.    End
  55.    Begin VB.CommandButton Command2 
  56.       Caption         =   ">"
  57.       Height          =   255
  58.       Left            =   9120
  59.       TabIndex        =   18
  60.       Top             =   120
  61.       Width           =   285
  62.    End
  63.    Begin VB.CommandButton Command1 
  64.       Caption         =   "<"
  65.       Height          =   255
  66.       Left            =   8760
  67.       TabIndex        =   17
  68.       Top             =   120
  69.       Width           =   285
  70.    End
  71.    Begin VB.Timer Timer1 
  72.       Interval        =   100
  73.       Left            =   10440
  74.       Top             =   0
  75.    End
  76.    Begin VB.TextBox Text1 
  77.       Height          =   285
  78.       Left            =   10560
  79.       TabIndex        =   16
  80.       Text            =   "Text1"
  81.       Top             =   120
  82.       Visible         =   0   'False
  83.       Width           =   255
  84.    End
  85.    Begin VB.CommandButton cmdSearch 
  86.       Caption         =   "Search Again"
  87.       Height          =   255
  88.       Left            =   120
  89.       TabIndex        =   14
  90.       Top             =   120
  91.       Width           =   1095
  92.    End
  93.    Begin VB.TextBox txtSearch 
  94.       Height          =   195
  95.       Left            =   -840
  96.       TabIndex        =   12
  97.       Top             =   -240
  98.       Width           =   855
  99.    End
  100.    Begin TabDlg.SSTab SSTab1 
  101.       Height          =   8055
  102.       Left            =   240
  103.       TabIndex        =   0
  104.       Top             =   480
  105.       Width           =   10455
  106.       _ExtentX        =   18441
  107.       _ExtentY        =   14208
  108.       _Version        =   393216
  109.       Tabs            =   12
  110.       Tab             =   6
  111.       TabsPerRow      =   6
  112.       TabHeight       =   520
  113.       BackColor       =   0
  114.       TabCaption(0)   =   "Yahoo"
  115.       TabPicture(0)   =   "frmSearchengine.frx":08CA
  116.       Tab(0).ControlEnabled=   0   'False
  117.       Tab(0).Control(0)=   "YahooBrowser"
  118.       Tab(0).ControlCount=   1
  119.       TabCaption(1)   =   "Excite"
  120.       TabPicture(1)   =   "frmSearchengine.frx":08E6
  121.       Tab(1).ControlEnabled=   0   'False
  122.       Tab(1).Control(0)=   "exciteBrowser"
  123.       Tab(1).ControlCount=   1
  124.       TabCaption(2)   =   "Alta Vista"
  125.       TabPicture(2)   =   "frmSearchengine.frx":0902
  126.       Tab(2).ControlEnabled=   0   'False
  127.       Tab(2).Control(0)=   "AltaVistaBrowser"
  128.       Tab(2).ControlCount=   1
  129.       TabCaption(3)   =   "Lycos"
  130.       TabPicture(3)   =   "frmSearchengine.frx":091E
  131.       Tab(3).ControlEnabled=   0   'False
  132.       Tab(3).Control(0)=   "LycosBrowser"
  133.       Tab(3).ControlCount=   1
  134.       TabCaption(4)   =   "Dog Pile"
  135.       TabPicture(4)   =   "frmSearchengine.frx":093A
  136.       Tab(4).ControlEnabled=   0   'False
  137.       Tab(4).Control(0)=   "DogPileBrowser"
  138.       Tab(4).ControlCount=   1
  139.       TabCaption(5)   =   "Look Smart"
  140.       TabPicture(5)   =   "frmSearchengine.frx":0956
  141.       Tab(5).ControlEnabled=   0   'False
  142.       Tab(5).Control(0)=   "LookSmartBrowser"
  143.       Tab(5).ControlCount=   1
  144.       TabCaption(6)   =   "Direct Hit"
  145.       TabPicture(6)   =   "frmSearchengine.frx":0972
  146.       Tab(6).ControlEnabled=   -1  'True
  147.       Tab(6).Control(0)=   "DirectHitBrowser"
  148.       Tab(6).Control(0).Enabled=   0   'False
  149.       Tab(6).ControlCount=   1
  150.       TabCaption(7)   =   "ThunderStone"
  151.       TabPicture(7)   =   "frmSearchengine.frx":098E
  152.       Tab(7).ControlEnabled=   0   'False
  153.       Tab(7).Control(0)=   "ThunderStoneBrowser"
  154.       Tab(7).ControlCount=   1
  155.       TabCaption(8)   =   "Hot Bot"
  156.       TabPicture(8)   =   "frmSearchengine.frx":09AA
  157.       Tab(8).ControlEnabled=   0   'False
  158.       Tab(8).Control(0)=   "HotBotBrowser"
  159.       Tab(8).ControlCount=   1
  160.       TabCaption(9)   =   "Ask Jeeves"
  161.       TabPicture(9)   =   "frmSearchengine.frx":09C6
  162.       Tab(9).ControlEnabled=   0   'False
  163.       Tab(9).Control(0)=   "AskJeevesBrowser"
  164.       Tab(9).ControlCount=   1
  165.       TabCaption(10)  =   "Netscape"
  166.       TabPicture(10)  =   "frmSearchengine.frx":09E2
  167.       Tab(10).ControlEnabled=   0   'False
  168.       Tab(10).Control(0)=   "NetScapeBrowser"
  169.       Tab(10).ControlCount=   1
  170.       TabCaption(11)  =   "Info Seek"
  171.       TabPicture(11)  =   "frmSearchengine.frx":09FE
  172.       Tab(11).ControlEnabled=   0   'False
  173.       Tab(11).Control(0)=   "InfoSeekBrowser"
  174.       Tab(11).ControlCount=   1
  175.       Begin SHDocVwCtl.WebBrowser HotBotBrowser 
  176.          Height          =   7215
  177.          Left            =   -74880
  178.          TabIndex        =   1
  179.          Top             =   720
  180.          Width           =   10095
  181.          ExtentX         =   17806
  182.          ExtentY         =   12726
  183.          ViewMode        =   0
  184.          Offline         =   0
  185.          Silent          =   0
  186.          RegisterAsBrowser=   0
  187.          RegisterAsDropTarget=   1
  188.          AutoArrange     =   0   'False
  189.          NoClientEdge    =   0   'False
  190.          AlignLeft       =   0   'False
  191.          ViewID          =   "{0057D0E0-3573-11CF-AE69-08002B2E1262}"
  192.          Location        =   ""
  193.       End
  194.       Begin SHDocVwCtl.WebBrowser AskJeevesBrowser 
  195.          Height          =   7215
  196.          Left            =   -74880
  197.          TabIndex        =   2
  198.          Top             =   720
  199.          Width           =   10095
  200.          ExtentX         =   17806
  201.          ExtentY         =   12726
  202.          ViewMode        =   0
  203.          Offline         =   0
  204.          Silent          =   0
  205.          RegisterAsBrowser=   0
  206.          RegisterAsDropTarget=   1
  207.          AutoArrange     =   0   'False
  208.          NoClientEdge    =   0   'False
  209.          AlignLeft       =   0   'False
  210.          ViewID          =   "{0057D0E0-3573-11CF-AE69-08002B2E1262}"
  211.          Location        =   ""
  212.       End
  213.       Begin SHDocVwCtl.WebBrowser NetScapeBrowser 
  214.          Height          =   7215
  215.          Left            =   -74880
  216.          TabIndex        =   3
  217.          Top             =   720
  218.          Width           =   10095
  219.          ExtentX         =   17806
  220.          ExtentY         =   12726
  221.          ViewMode        =   0
  222.          Offline         =   0
  223.          Silent          =   0
  224.          RegisterAsBrowser=   0
  225.          RegisterAsDropTarget=   1
  226.          AutoArrange     =   0   'False
  227.          NoClientEdge    =   0   'False
  228.          AlignLeft       =   0   'False
  229.          ViewID          =   "{0057D0E0-3573-11CF-AE69-08002B2E1262}"
  230.          Location        =   ""
  231.       End
  232.       Begin SHDocVwCtl.WebBrowser